home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
EnigmA Amiga Run 1996 March
/
EnigmA AMIGA RUN 05 (1996)(G.R. Edizioni)(IT)[!][issue 1996-03][Skylink CD IV].iso
/
earcd
/
util3
/
drafu101.lha
/
DRAFUplus
/
Install_DRAFU
< prev
next >
Wrap
Text File
|
1995-12-30
|
3KB
|
88 lines
; $VER: Install_DRAFU.script V1.00 (28.12.95)
; © 1993-95 by Andreas R. Kleinert.
(set selectlang (askchoice
(prompt "")
(help @askchoice-help)
(choices "Deutsche Installation" "English Installation")
(default 1)
)
)
(if (= selectlang 0) (set @language "deutsch") )
(if (= selectlang 1) (set @language "english") )
(if (= @language "deutsch")
(
(set MSG_wrong_OS (cat "Sie benötigen mindestens OS V2.04 für DRAFU !\n\n"
"DRAFU wird auf Ihrem System nicht laufen !"))
(set MSG_InstallingDRAFU "Installiere jetzt DRAFU. Die Libraries müssen separat installiert werden !")
(set MSG_SelectPath "Wählen Sie das Zielverzeichnis für DRAFU")
(set MSG_InstallingCatalogs "Installiere jetzt die Katalog-Dateien für die\nOS V2.1+ Sprach-Unterstützung.")
(set MSG_SelectCatalogPath "Wählen Sie den Pfad für die Katalog-Dateien")
(set MSG_DoInstallDRAFU "DRAFU wurde installiert.")
(set MSG_DRAFUPath "Modifiziere jetzt S:User-Startup für einen Suchpfad...")
)
)
(if (= @language "english")
(
(set MSG_wrong_OS (cat "You need at least OS V2.04 to run DRAFU !\n\n"
"DRAFU will not run with your system configuration !"))
(set MSG_InstallingDRAFU "Installing DRAFU now. Libraries have to be installed separately !")
(set MSG_SelectPath "Select path to install DRAFU to")
(set MSG_InstallingCatalogs "Installing Catalog-Files for OS V2.1+\nCode localization.")
(set MSG_SelectCatalogPath "Select path to install Catalogs to")
(set MSG_DoInstallDRAFU "DRAFU has been installed.")
(set MSG_DRAFUPath "Now modifying your S:User-Startup for a search path...")
)
)
(set OS_VER (/ (getversion) 65536) )
(if(< OS_VER 37)
(abort MSG_wrong_OS)
)
(complete 0)
(copyfiles
(prompt MSG_Installing)
(help @copyfiles-help)
(source "")
(set svcomdir
(askdir
(prompt MSG_SelectPath)
(help @askdir-help)
(newpath)
(default "SYS:DRAFU")
)
)
(dest svcomdir)
(all)
(confirm)
)
(complete 70)
(copyfiles
(prompt MSG_InstallingCatalogs)
(help @copyfiles-help)
(source "locale/catalogs")
(set svcomdir
(askdir
(prompt MSG_SelectCatalogPath)
(help @askdir-help)
(newpath)
(default "SYS:locale/Catalogs")
)
)
(dest svcomdir)
(all)
(confirm)
)
(complete 99)
(exit MSG_DoInstallDRAFU)